home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 36 / Amiga Format CD36 (1999-01-22)(Future Publishing)(GB)[!][issue 1999-02].iso / -seriously_amiga- / wb / assignmaster / install / english < prev    next >
Text File  |  1998-11-25  |  4KB  |  128 lines
  1. (welcome "Welcome to the installation utility for AssignMaster.")
  2.  
  3. (if (= (askbool (prompt "A T T E N T I O N !\n\n"
  4.                         "An older version of AssignMaster should be completely "
  5.                         "removed (including all save files) before installing new "
  6.                         "Version 1.4.\n\n"
  7.                         "Continue installing AssignMaster?")
  8.                 (help @askbool-help)
  9.                 (default 1)
  10.         ) 0)
  11.   (
  12.     (exit (cat "\n\nUser break installation procedure. "
  13.                "No files are copied.")
  14.           (quiet)
  15.     )
  16.   )
  17. )
  18.  
  19. (set #destination_prg (askdir (prompt "Please select destination drawer "
  20.                                       " for AssignMaster executable.")
  21.                               (help @askdir-help)
  22.                               (default "SYS:Tools")
  23.                       )
  24. )
  25.  
  26. (set #destination_amloader (askdir (prompt "Please select destination drawer "
  27.                                            " for AMLoader executable.")
  28.                                    (help @askdir-help)
  29.                                    (default "C:")
  30.                            )
  31. )
  32.  
  33. (set #destination_doc (askdir (prompt "Choose the destination for "
  34.                                       "the documentation file.")
  35.                               (help @askdir-help)
  36.                               (default "HELP:")
  37.                       )
  38. )
  39.  
  40. (set #libcopy (askbool (prompt "Will you install the support.library for "
  41.                                "AssignMaster?\n\nYou only need it to handle "
  42.                                "the startup files, but this feature won't "
  43.                                "work correctly!")
  44.                        (help @askbool-help)
  45.                        (default 0)
  46.               )
  47. )
  48.  
  49. (copyfiles (prompt "Copy executable...")
  50.            (help @copyfiles-help)
  51.            (source "/AssignMaster")
  52.            (dest #destination_prg)
  53.            (files)
  54.            (confirm)
  55.            (infos)
  56. )
  57.  
  58. (copyfiles (prompt "Copy loader program...")
  59.            (help @copyfiles-help)
  60.            (source "/AMLoader")
  61.            (dest #destination_amloader)
  62.            (files)
  63.            (confirm)
  64. )
  65.  
  66. (copyfiles (prompt "Copy english documentation...")
  67.            (help @copyfiles-help)
  68.            (source "/docs/AM_Eng.GUIDE")
  69.            (dest #destination_doc)
  70.            (newname "AssignMaster.guide")
  71.            (files)
  72.            (confirm)
  73.            (infos)
  74. )
  75.  
  76. (copyfiles (prompt "Copy history text...")
  77.            (help @copyfiles-help)
  78.            (source "/docs/AM_History.txt")
  79.            (dest #destination_doc)
  80.            (newname "AssignMaster.History")
  81.            (files)
  82.            (infos)
  83.            (confirm)
  84. )
  85.  
  86. (if (= 1 #libcopy)
  87.  
  88.   (copylib (prompt "Copy support.library...")
  89.            (help @copyfiles-help)
  90.            (source "/libs/amsupport.library")
  91.            (dest "LIBS:")
  92.   )
  93. )
  94.  
  95. (if (= 1 (askbool (prompt "The following function is only useable for later "
  96.                           "installation of AssignMaster in the 'startup-sequence'.\n\n"
  97.                           "Should the current assign-list saved now?\n\n"
  98.                           "If you not sure, select \"No\".")
  99.                   (help @askbool-help)
  100.                   (default 0)
  101.                   (choices "Ja" "Nein")
  102.          )
  103.     )
  104.   (
  105.     (set #savefile (askfile (prompt "Select path and name of savefile now.")
  106.                             (help @askfile-help)
  107.                             (default #destination_prg)
  108.                    )
  109.     )
  110.     (set #amcommand (cat (tackon #destination_prg "AssignMaster")
  111.                          " BACKUP=\""
  112.                          #savefile
  113.                          "\"")
  114.     )
  115.     (run #amcommand (prompt (cat "Saving current assign list into file:\n"
  116.                                  #savefile)
  117.                     )
  118.                     (help @run-help)
  119.                     (confirm)
  120.     )
  121.   )
  122. )
  123.  
  124. (exit (cat "Installation complete.\n\n")
  125.       (quiet)
  126. )
  127.  
  128.